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PARA RAARAAARAAAAAAAALALLALASLELSL ELAS EEE EEE EERE EEE EE EEE EE EES SECTS eae | 


COPYRIGHT (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 


THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND cores 
ONLY IN ACCORDANCE WITH THE as OF SUCH LICENSE AND WITH THE 
INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER 
OPIES THEREO YN E PR 


* 
* 
* 
* 
oy 
« 
* 
@ 
0 * 

OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
TRANSFERRED. * 
* 

THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE * 
cf 

* 

® 

* 

® 

* 

* 

* 


AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. 


FOR THE USE OR RELIABILITY OF ITS 


DIGITAL ASSUMES NO RESPONSIBILITY 
IS NOT SUPPLIED BY DIGITAL. 


I 
SOFTWARE ON EQUIPMENT WHICH 


eeeeeeeeeeeeeeeeeeees 


LARRAAAAAAAAAAAALALALA LALA LE LEASE LESSEE SELES ERR ESR EERE EERE RRR ERE REESE SE 


Soooooooooooooo 
SOOO OCSSCSCSCOOOOOCOCOOOSOOOOOOoOoSoOo 
SOoSOSS COSSCSCOSOSOSOSOSOSOOSOOSOSOOoOoOSooO 


SOOO OCOSOSOSOSOSSSSSSSSOSOSOSSOSOOOCCOOSOOOOOOOOOOOOOOOoO 


0 
° 
0 
0 
0 
0 


0 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 
00 


th 

3; FACILITY: BOOTS 
: ABSTRACT: 
$ This module contains the bootstrap device driver for the 

: RX50 console floppy. 

: ENVIRONMENT: IPL 31, kernel mode, code must be PIC 

; AUTHOR: Robert L. Rappaport, CREATION DATE: 14-Oct-1983 

: MODIFIED BY: 

: v03-001 RLROOO1 Robert L. Rappaport 2-Apr-1984 

: Subroutine LOAD_RX50 BN. in RO; 0 implies success and 


1 implies error. Correct sense of BLBx instructions o 
callers of this routine. 


SOOoOooooooooooooooooao 
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15-S 
DECLARATIONS 6-5 
2 49 -SBTTL DECLARATIONS 
1 : INCLUDE FILES: 
00 ¢ 3 
$00 4 SBTDDEF 
000 5 SIODEF 
boo § SPRDEF 
Se Henan 
000 38 SSSDEF 
ae Bo es 
4 ¢ 3 
sis 65 ; MACROS: 
000 64 ; 
0000 65 
0000 66 ; 
0000 67 ; EQUATED SYMBOLS: 
0000 68 ; 
0000 69 
$000 Mt : 11/8SS CONSOLE FLOPPY DEFINITIONS 
0000 Lf; : 
0000 7 
0000 74 SDEFINI RX 
0000 75 
0000 76 SDEF RXSID -BLKB 
00000002 0001 77 -BLKB 
00000003 000 78 -BLKB 
00000004 000 79 BLKB 
0004 80 SDEF RX5CSO BLKB 
0005 81 
0005 Hf 
0005 «8 _VIELD RX5CS0,0,<- 
0005 84 <SIDSEL,,M>,=- 
0005 85 <DSKSEL,,M>,- 
0005 86 <DRVSEL ° M> -- 
0005 87 <EXTMOT,,M>,- 
0005 88 <FUNCO, ,M>,=- 
0005 89 <FUNC1,,M>,=- 
0005 90 <FUNC2, ,M>,- 
0005 91 > 
005 9 <DONE, ,.M>,- 
0005 94 <,3>,° 
0005 3=s«9'5 <ERROR, .M>,- 
0005 9 > 
00000006 0005 5 -BLKB 
0006 38 
0006 .] 
B08 100 SDEF RX5CS1 -BLKB 
000 101 
00000008 4-44 1 ¢ -BLKB 
008 103 SDEF RX5SCS2 -BLKB 
0009 104 
0000000A 0009 105 -BLKB 


-_-—-" —_—— -_ 


“" 
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Boot device types 

1/0 function codes 
Processor registers 
PTE definitions 

RPB offsets 

Status codes 

Virtual address fields 


;START OF REGISTER DEFINITIONS 
; ID Register (RO register, value is 04) 


Dual purpose register. Used for 
entering commands and also for 
reading status. ah 

Command Function bit definitions. 

Side Select 

Disk Select 

Drive Select . 

Extended Motor Timeout 

Function Bit 

Function Bit | 

Function Bit 2 


R/W Status bit definitions. 
Done 


Error summary 


Command Function is to accept target 
track. 


:; Command Function is to accept target 
sector. 
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O0A 106 SDEF RX5CS3 -BLKB 1 3; Current Sector - This register contains th 
bbe 1 3 sector number that was last specified 
108 ; in the input sector register. 
0000000C ope 1 -BLKB 1 
ite Wt SDEF RX5CS4 -BLKB 1 : Incorrect track register - The contents 
00D 116 : of this register will be valid only 
00D 11 ; when a SEEK error occurs while attempting 
00D 114 3 to execute a command. Then this 
$4 115 : register will contain the track address 
0D 118 ; where the R/W head finally located. 
44 11 ; If no SEEK error occurred, will be 0. 
0000000E 444 18 -BLKB 1 
si : ? SDEF RX5CS5 -BLKB 1 : Extended Command Register 
OOOF 1 ; 
00000010 Bayp ; 5 -BLKS 1 
0010 125 SDEF RXSEB -BLKB 1 ; Empty Sector Buffer Register - Sequential 
0011 18 $ byte reads from this register empty 
0011 127 ; the 512 byte data buffer. 
00000012 Batt 168 -BLKB 1 
Oolg 150 SDEF RXS5CA -BLKB 1 3; Clear Address Register - _ access to 
001 13) ; this register results in clearing 
oot? 1 ¢ ; Data Buffer address to zero. 
00000014 dF 13 -BLKB 1 
0014 135 S$DEF RX5G0 -BLKB 1 ; Start Command Register - Any access 
0015 136 3; to this register instructs the 
0015 137 ; controller to execute the function 
0015 138 : specified in the command registers. 
00000016 Bat? F 4 -BLKB 1 
0016 141 SDEF RXSFB -BLKB 1 ; Fill Sector Buffer - Write only 
0017 166 : register. Successive byte writes 
0017 14 3 to this register fill 512 byte buffer. 
00000018 Borg 12e -BLKB 1 
00000040 0018 146 RX_READSECTOR = “x40 : FUNCTION READ SECTOR 
00000070 oat +t 4 RX_WRITESECTOR = “x70 ; FUNCTION WRITE SECTOR 
Bote +4 SDEFEND RX sEND OF 11/8SS FLOPPY DEFINITIONS 
20080000 944 133 RCX5O_REGS = “*x200B0000 3; Physical address of RCX50O CSRs. 
000 1535; 
4 154 ; OWN STORAGE: 
00 155 ; 
$31 
0000 158 : Boot driver table entry 
$3831 
00 161 $BOOT_DRIVER DEVTYPE = BTDSK_CONSOLE,- ; Device type (console) 
0000 162 - CPUTYPE = PRS. STD TYPASS,- > Cpu type ci1/ SS) 


ean 


ONS 


E = CONSRX_DRVSIZ,- 
R_ = CONSRX DRIVER,= 
VRNAME = RRNAME 


AX/VMS Macro v04-00 
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; Driver size 
Driver address 
3; Driver file name 


"RSEb=198e 93:08:28 | 
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54 


0D06 8F 
20080000 8F 


54 
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Page 
BOOTS.SRCJRXBTDRIVR.MAR; 1 . 


68 1 -SBTTL Console Floppy Bootstrap Driver Code 
3 8 34+ 
i 4 3 Inputs: 
00 73: R1 Address of page table for virtual => physical mappi 
00 74; Re Base VPN of tlenster (Bits 29:9 of RIB)” —- 
B88 75 ; R L8N for current piece of transfer 
00 76; R8 Size of transfer in bytes 
00 77 3 RY Address of the RPB 
4 g : R10 Starting address of transfer 
000 ; FUNC(AP) 1/0 operation (10$_READLBLK or I0$_WRITELBLK only) 
000 $ MODE (AP) Address interpretation mode: cs pigs: 
44 : 0 => Physical, 1 => Virtual 
909 8 ; Outputs: 
909 8 3 RO Status code: 
000 188; SS$_NORMAL Successful transfer 
000 89 ; SS$_CTRLERR Fatal controller error 
00000010 00 FUNC = 16 
00000014 + MODE = 20 
00 CONSRX_DRIVER: 
BB 00 PUSHR #*M<R1,R2,R8,R10,R11> ; Save tnt registers 
dO 4 MOVL #RCX5O_REGS,R4 3; R4& => CSR base (physical address). 
08 
08 Perform initialization: Set up a mapping switch in R11, 


38 
04 


58 A9 


There are 4 possibi 
or physical 
If the 1/0 


COOoOoCoOoCooooooooososo 


SHSSO SOO SOO SOO ow 


PRIPOPIP ONIN IMIMINININMININIPININININININPIN INN IAI Ya at st tk kk kk kh hd do ot 


RNIN 3 3 SS SB SB IO OO OOO OOOO OD000 


pointed to by R1. 
PTE. 


WR SO ODNAUE WIN 9 ODNAUE WIN $9 ODNAUE WIN $9 ODNAULS WN" OOONOUS WN OWOOon 


SOOOOCSOSOOSOOOSOSOSOOSOSOSOSOSOSOSOOOSOOSOSOSOSOSOOSOOOOOOOOOOOOOOOO 


0 
0 
0 0 Both modes match, i 
; u Do virtual => phys 
; 
8 0 MFPR = #PRS_MAPEN,R11 
1 00 BEQL 10$ 
bt 
d0 Bie MOVL RPBSL_CSRVIR(RI) ,R4 
Bid 
14 


Lities concerning mapping: 
done virtual or physical (MODE(AP)) and we can be executin 
(contents of processor Ay 
modes match, then we can just copy data 
is to be done virtual and we are euequt ing physical 
then the buffer address has to be translated using the 
the 1/0 is to be done physical and we are 
executing virtual then we have to double map t 
At this point, we just compute a mapping switch in R11 as follows: 


the 1/0 can be 

virtual 

ster PR$_MAPEN). If both 
to/from the user buffer. 


page table 
e buffer using a spare 


ust copy the data 
cal translation using page table 


Do physical => virtual mapping using a spare PTE 


Get mapping enabled switch 
EQL wap ies mapping NOT enabled so 

the p ysical CSR address in R4 is 
valid. 
lace with virtual CSR address. NOTE 
toes this implies that the console 

is we rely on RPBSL_CSRVIR pointing 


‘ 


3) 


ee eee 
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SE SH:ER:ES YANAYNS tosreg¥O4r00 age. P20 6, 


} 
14 4 3 hi ice’ R. 
5B 5BCi i Peace MNEGL R11,R11 * str els 
; Negate 
5B 14 AC ‘5 Baie 5 ADDL MODE (AP) ,R11 3 Add 1/0 mode switch 
56 51 7D baie : mova R1,R6 ; R6 = Addr. of page tbl, R7 = Base VPN 
QO1E 13 | 
Bate § 3; Set up mapping if required 
0084 30 abe) 4 : BSBW = DO_MAPPING | 
1 3 
0021 7 ; This is the main loop to read or write to the floppy and to get 
8 : Hs ; or store in memory. Register usage is: 
0021 240: RO = R3 Scratch | 
0021 41; R4 Address of CSR base 
0021 $5 3 R5 LBN 
0021 43; R6 Address of page table 
0021 44; R7 Virtual page number of buffer 
0021 45 ; R8 Size of remaining buffer (in bytes) 
0021 46 ; RY Address of RP 
0021 47 ; R10 Address of current spot in buffer 
Ons! $8 ; R11 Mapping switch | 
0021 50 : First convert LBN to physical sector and | 
0021 51 ; cylinder. Then send command, sector, and cylinder to floppy. Then | 
8 ; 28 3; read or write 512 bytes of data. Repeat until byte count goes to zero. 
0021 $27 : 
0021 $32 
32 : $ MAIN_LOOP: 
5E 10 0031 238 BSBB TRKSEC : Returns: RO = side select, 
00 ; 59 3 R1 = track and R2 = sector 
53 0200 8F 3C 002 60 MOVZWL #512,R3 3 Assume full sector 1/0. 
58 53 01 0028 61 CMPL R3,R8 ; Compare to what's left of buffer. 
03 15 0028 $¢ BLEQ 10$ : LEQ implies full sector of 1/0. 
53 58 00 8 B o7 108 MOVL R8,R3 3; User lesser of R3 and R8. 
21 10 ac D1 0030 65 | + CMPL ~—s FUNC(AP) ,#I10$_READLBLK ; Is it read? | 
25 13 0034 66 BEQL READ : Yes 
8036 67 
O36 88 ; D Write to the fl 
3; Do a Write to the flo 
anes $70 te 
SO 70 8F 88 036 % BISB #RX_WRITESECTOR,RO ; Or in write command. ; 
12 A4 95 QO3A 27 TSTB = RXSTACR4) ; Clear hardware buffer (silo) address. 
50 0D 3 ? fe 208 PUSHL RO ; Save register value. 
75 10 003F 26 " -«BSBB-Sts«GEEBYTE ; Get byte from menory into RO. 
16 A4 2 9 ba 7 MOVB RO, RXSFBC(R4) : Fill hardware (silo) buffer. 
F7 5 F $3 78 SOBGTR R3,20$ 3 Repeat : 
50 8Ep% on 79 POPL R : Restore register. ; 
009E 0 48 80 BSBW LOAD_Rx50 3 Load CSRs. (RO=0 return is success.) 


XBTDRIVR - 11/8SS CONSOL 
-0 Console Floppy 
20 50 —=s«ED9 poe 1 
2 588 
51 

51 4 

OD06 8F 1 $31 5 
50 0054 8F f 55 $ 

0 OSA 

0058 38 
0058 9 
0058 90 

0058 91 

B88 35 

058 ] 

50 40 8F 88 O005B 294 
008A 30 OO0S5F $32 
Ec 50 —=s«éE8 Bpe8 96 
12 ASG 8695 «(006 297 
0068 98 

50 10 A&4 90 0068 99 
53 10 006C 00 

F7 53 FS OO6E 301 

0071 30 

0071 #30 

0071 304 

0071 305 

0071 306 

0071 307 

58 D5 0071 308 

04 13 0073 309 

55 06 0075 £310 

AB 11 0077 311 

0079 #8312 

0079 $12 

0079 14 

~~ 7. SS Gore. 399 
0D06 8F BA O07C 313 

05 0080 17 
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otstrap Driver Code 


BLBC RO,SECTOR_SUCCESS ; If success, branch around. 
FLOPPY_ERROR: ; Error from floppy 

POPR #*°M<R1,R2,R8,R10,R11> ; Restore registers 

MOVZWL #SS$_CTRLERR.RO : Set failure status 

RSB 3; Return and retry 


: Do a Read from f Loppy 


READ: 
B1SB #RX_READSECTOR,RO ; Or in read command. 
BSBwW LOAB_Rx50 ; Load CSRs. (RO=1 return is failure.) 
BLBS RO, FCOPPY_ERROR ; If ERROR, branch back. 

30$ TSTB RXSCACR4) ; Clear hardware buffer (silo) address. 


MOVB RXSEB(R4) ,RO 3 Enety hardware (silo) buffer. 
BSBB UTBYTE ; Put byte into memory from RO. 
SOBGTR R3,30$ Repeat 


: Done with this sector. Repeat loop if byte count is non-zero 
SECTOR_SUCCESS: 


R8 ; Test remaining byte count 
BEQL DONE _SUCCESS ; Done 
INCL 3; Increment LBN 
BRB MAIN_LOOP ; Do next sector 


DONE _SUCCESS: 
MOVZWL 
POPR 
RSB 


#SS$_NORMAL ,RO :; Successful completion 
#*°M<R1,R2,R8,R10,R11>  : Restore registers 


! 
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081 19 3+ 
te 0 ; TRKSEC = Subroutine to convert LBN to physical 
081 1 ; eocter “ere rneee on floppy by applying sector interleave 
+t ¢ $ and track=to-track skew (2 secto 
; 081 4 ; Inputs: 
| a8 $3 R5 LBN 
09 1 $ 3; Outputs: 
81 8 ; OUTPUTS: RO Side select data 
0081 7s R1 track number 
49 ? 3 Sector number 
0081 3¢ ; NOTES: SIDE = LBN DIV 800 BN = LBN MOD 800 
0081 33 3 TRK = BN DIV 10 BNA = BN MOD 10 
0081 34; 
0081 35 ; Credits: 
0081 $39 5 Thanks to Dick Vignoni for this one. 
| 0081 7 jee 
0081 $38 
0081 339 TRKSEC: 
0081 340 
aed $03 ; Convert LBN in R5 to physical device address 
50 55 »vD0 0081 348 MOVL R5,R0 ; Copy LBN ¥. ng 
51 D4 0084 344 CLRL R1 ; Clear for 
52 50 50 00000320 8F 7B 0086 345 EDIV #800.,R0,RO,R2 ; R2<=BN ROee SURF ACE 
53 D4 O08F <09 CLRL R3 3; Clear for 
53 51 52 OA 7B 0091 47 EDIV #10.,R2,R1,R3 ; 1 eg R <= BNA 
52 5100 «(0096S 348 ADDL2 R1,R2 : = BN + TRK 
S52. 02 C& 0099 349 MULL #2,R2 3 Rees OG (Bw+ 18K) #2 
53 05 C6 O09C 329 DIVL #5,R3 3 R3<== 
52 53 CO OO09F 51 ADDL2 R3,R2 Fs + Seiya + ((BN+TRK)*2)) 
53 D4 OOA2 326 CLRL R3 ; Clear for EDIV 
52 53 52 OA 7B Q0A4 35 EDIV #10.,R2,R3,R2 ae == OD 1 
52 D6 OOA9 354 INCL R2 3; Make tracks start at 1 
51 D6 OQOAB 355 INCL R1 ; Make sectors start at 1 
51 50 8F 91 OOAD 356 CMPB #80.,R1 3; is this the last track on surface ? 
02 12 #0081 357 BNEQ 10$ ; Br if no 
51 D4& 00B3 358 CLRL R1 3 set track to 0 (last track=0) 
0085 359 10$: 
05 0085 360 RSB 


oo 
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0B6 62 5 ++ | 
B6 65 ; GETBYTE = Subroutine to get a byte from memory t 
+ rt: ; PUTBYTE = Subroutine to store a byte in memory 
| +4 $6 ; These two subroutines do two things special: 
0B6 68 ; 1) Since the flo always reads or writes 128 bytes t 
| 0B6 4 ; these routines simply return if the byte count is zero. ] 
0B6 BR: 2) These routines take care of page boundaries if | 
0B6 fis mapping is required. l 
0B6 i : f 
0B6 73 ; Inputs: ‘ 
0B6 74 ; RO Byte to store (PUTBYTE) $ 
0086 13 3 R6 Address of page table ‘ 
0086 76 ; R? Virtual page number of buffer § 
0086 3 R8 Size of remaining buffer (in bytes) ‘ 
0086 78 ; R10 Address of current spot in buffer ‘ 
0086 44 $ R11 Mapping switch: § 
00B6 80 ; -1 Do physical -> virtual map ‘ 
0086 381 ; 0 No ts required $ 
00B6 386 3 1 Do virtual => physical translation H 
00B6 83 ; ‘ 
00B6 384 ; Outputs: § 
00B6 385 ; RO Byte fetched from memory (GETBYTE) 
00B6 386 ;-- 
00B6 387 
00B6 388 -ENABL LSB 
0086 389 
00B6 390 GETBYTE: F 
50 D4 0086 391 CLRL RO ; Return 0 if byte count = 0 : 
58 05 0088 $35 TSTL R8 :; Is byte count 0? j 
2E 13 OOBA 39 EQL 90$ 3 Yes { 
50 8A 9A O0BC 394 MOVZBL (R10)+,R0 ; Get byte i] 
07 11 OOBF 395 RB 10$ ; Branch to common code ' 
00C1 396 
00C1 397 
00C1 398 PUTBYTE: 
58 Dd5 00C1 399 TSTL R8 : Is byte count 0? 
25 13 00C3 400 BEQL 90$ : Yes 
8A 50 90 00C5 401 MOVB RO, (R10)+ ; Store byte F 
00C8 406 . 
00c8 40 ] 
58 D7 O0C8 404 10$: DECL R8 ; Decr. byte count ( 
1€ 13 once 405 BEQL 90$ ; Reached zero f 
5A OFF 8F B35 OOCC 406 BITW #VASM_BYTE,R10 ; Did address overflow onto new page? $ 
17 12 Q0D1 407 BNEQ 90$ ite .. f 
57 D6 O00D3 408 INCL R7 : Yes, increment page number ‘ 
0005 409 f 
00D5 410; ( 
00D5 411 ; Fall through to... | 
0005 218 3 
00D5 841 1 
0005 414 } 
Bn03 415 34+ ; | 
005 a9 ; DO_MAPPING = Subroutine to perform necessary mapping i 
00D5 417; 1 
0005 418 ; Inputs: 
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Console Floppy Bootstrap Driver Code 4-SEP-1984 05:4 BOOTS. SRCJRXBTDRIVR.MAR; 1 (3) 
D 138 § RG Address of page table 
D 420 ; R Page number of buffer 
D 421 ; R10 Address to ma 
Bp 4 § 3 R11 Mapping switch: ‘ 
D 423 ; <1 Do physical => virtual map 
OD 424 ; 9 No mapping required 
4 ? Do virtual => physical translation 
00D 4 : 3; Outputs: 
005 428; R10 Address to use 
Be tg i 
bp 431 DO_MAPPING: 
D5 00D5 4 § TSTL R11 ; Any mapping required? 
13 00D7 343 BEQL 90$ 3; No 
19 00D9 tte BLSS 100$ : Yes, map physical to virtual 
CA 00D 435 BICL #*C<VASM_BYTE>,R10 :; Yes, translate virtual to physical 
OOE 436 ; Clear everything but byte offset 
DD OOE 437 PUSHL (R6)CR7] ; Get PFN on top of stac 
FO OOE 438 INSV (SP)+,#VASV_VPN,APTESS_PFN,R10 ; Insert PFN after byte offset 
05 OOEA 439 90$: RSB : 
OOEB 440 
Oofe a2 
sd re 3; Map physical to virtual 
00 OOEB 445 100$: HALT ; Not implemented yet 
OOEC 447 -DSABL LSB 


ee 
| 
| 
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pee 449 34+ 
4 $29 ; LOAD_RX50 = subroutine to load RX50 CSR's 
Ore 68¢ 3 Inputs: 
OEC 455; RO = Command or'ed with side select 
OEC 454; Ri = track 
OEC 455; R2 = sector 
OEC $28 3 R4 => CSR base 
OEC 457; 
OOEC 458 ; Outputs: 
QOEC 459; RO = 0 if successful 
Spe 189 $ RO = 1 if error -#teeeNOTE, inverted success/failure indicatione++++ 
OOEC rr 
OOEC 463 LOAD_RX50: 
OOEC 464 
046 A6 50 90 OOEC 465 MOVB RO,RXSCSO(R4) 3; Load command and side select. 
06 AS 651 90 OOFO 466 MOVB R1,RX5CS1(R4) 3; Load track. 
08 AG 52 90 OOFS 467 MOVB R2,RX5CS2(R4) 3; Load sector. 
14 AG 9G OOF 468 a CLRB = RX5G0(R4) : Start function. 
50 04 A4 9A OOFB 470 MOVZBL RX5CSO(R4),RO ; Read status register. 
0 O08 93 OOFF 471 BITB #RX5CSO_M_DONE ,RO ; See if function completed. 
FZ 3813 0102 476 BEQL 10$ ; EQL implies not yet done. 
0104 47 ASSUME RXSCSO_V_ERROR £0 7 
50 50 Ff9 8F 78 0104 474 ASHL #-7,R0,R0 3; Shift error bit into low bit of RO. 
05 3188 $22 RSB 3; Return to caller. RO has status. 
58 45 2E 52 45 56 49 52 44 58 52 4 3198 477 RXNAME: .ASCIC /RXDRIVER.EXE/ 
OC 010A 
0117 478 
00000117 0117 479 CONSRX_DRVSIZ=.-CONSRX_DRIVER 
0117 480 
0117 = 481 - END 


G 15 
RXBTDRIVR = 11/8SS CONSOLE RX50 BOOT DRIVER 15 tae 4 9 $3:32:26 eave Macro v04-00 Page 1 
-19 05:4 (3) 


Symbol table 4-SEP 4 0 BOOTS .SRCIRXBTDRIVR.MAR; 1 
$T = 4 08 a 02 
BIDSK_CONSOLE = 4 
CONSRX_DRIVER 8 09 R 03 
CONSRX _DRVSIZ = 11 
DONE _SOCCESS 4444 16 R 93 
DO_MAPPING 000 Fy R 
FLOPPY _ERROR 48 1R 03 
FUNC = Boas 
GETBYTE 44164 0B6 R 03 
10$_READLBLK = 00000021 
LOAB_Rx50 BOO SOS S R 03 
IN 44444 1R 03 
= 00000014 
PRS_MAPEN = 00000938 
PR$_SID_TYP8SS = 00000005 
PTESS_PFN = 00000015 
PUTBYTE 000000C1 03 
RCX50_REGS = 20080000 
EAD 00000058 R 03 
RPBSL_CSRVIR = 00000058 
RXSCA 00000012 
RX5CSO 00000004 
RXSCSO_M_DONE = 00000008 
RX5CSO_V_ERROR = 00000007 
RX5CS1 00000006 
RXSCS 00000008 
RXSCS 0000000A 
RX5CS4 0000000C 
RX5CS5 0000000E 
RXSEB 00000010 
RXSFB 00000016 
x5GO0 00000014 
RX51D sit 46 
RXNAME 0000010A R 03 
RX_READSECTOR = 00000040 
RX_WRITESECTOR = sit 4 A 
SETTOR_SUCCESS 00000071 R 03 
3) a = 00000001 
SS$_CTRLERR = 00000054 
SS$_NORMAL = 00000001 
TRKSEC 00000081 R 03 
VASM_BYTE ® QOOOOIFF 
VASV_VPN = 00000009 
ewes mena weswwen = + 
: Psect synopsis ! 
PSECT name Allocation PSECT No. Attributes 
. 6 .« 00000000 <( 0.) 00 ¢ 0.) NOPIC USR CON ABS _ LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
Serban SC a a a a a ar i 
BOOTDRIVR™ 2 0000011 ( 279.) O03 ¢ $:} NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC BYTE 
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! Performance indicators ! 
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Phase Page faults CPU Time Elapsed Time 
Initialization 36 0:00:00.09 00 :00:00.53 
pounane processing 138 8 8 98°98 09:00:33.1 
=r hentex of BE mS 
Symbol table output 3 0: 6: 0.19 0: 9:00:96 
Psect synopsis output 2 89:98: 0.0 0:00:00.02 
Cross-reference output 0 00:00:00.00 299799 -9 
Assembler run totals 609 00:00:14.62 00:00:33.36 


The working set Limit was 1500 pages. 

57074 bytes (112 pages) of virtual memory were used to buffer the intermediate code. 

There were 60 pages of symbol table space allocated to hold 1076 non-local and 9 local symbols. 
481 source Lines were read in Pass 1, producing 14 object records in Pass 2. 

9 pages of virtual memory were used to define 17 macros. 
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! Macro Library statistics H 
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Macro Library name Macros defined 
-$255$DUA28: (BOOTS .OBJJBOOTS.MLB; 1 1 
-5255$DUA28: CSYS.OBJJLIB.MLB; 1 4 
$255$DUA28: CSYSLIBISTARLET.MLB; 2 ; 
TOTALS (all libraries) 1 


1169 GETS were required to define 13 macros. 
There were no errors, warnings or information messages. 
MACRO/LIS=L1IS$:RXBTDRIVR/OBJ=OBJ$:RXBTDRIVR MSRC$:RXBTDRIVR/UPDATE=(ENH$:RXBTDRI VR) +EXECML$/LIB+LIB$:B00TS .MLB/LIB 


BOOTS.SRCIJRXBTDRIVR.MAR; 1 
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